home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 27 / CU Amiga Magazine's Super CD-ROM 27 (1998)(EMAP Images)(GB)[!][issue 1998-10].iso / CUCD / Readers / Backbone / Backbone_Install < prev    next >
Text File  |  1998-07-29  |  4KB  |  168 lines
  1. (set #wrongversion
  2. (cat "You have an old version of the program 'Installer' "
  3.      "on your Amiga!\n\n"
  4.      "The installation procedure was written for Installer 42.9.\n\n"
  5.      "Note that installation may fail!"
  6. ))
  7.  
  8. (if (< @installer-version 2752521)
  9.   (
  10.     (message #wrongversion)
  11.   )
  12. )
  13.  
  14. (set #intro
  15. (cat
  16.    "Welcome to the Backbone Installation Utility\n"
  17.    "This program will install all the files needed\n"
  18.    "into the desired directory and ensure you have\n"
  19.    "all the required librarys installed also.\n\n"
  20.    "NOTE:\n"
  21.    "Ensure all archives are unpacked into the same\n"
  22.    "place before beginning the installation.\n\n"
  23.    "Thanks for using Backbone!\n"
  24.    "Please consider Registering"
  25. ))
  26.  
  27. (message #intro)
  28.  
  29. (set #installdir (pathonly @icon))
  30.  
  31. (set #path
  32.    (expandpath
  33.       (askdir 
  34.          (default "Work:")
  35.          (prompt "Select Directory to Install Backbone into\nA Directory will Automatically be Created named Backbone")
  36.          (help "Just do what it says!")
  37.          (disk)
  38.       )
  39.    )
  40. )
  41.  
  42. (set #bbpath (tackon #path "Backbone"))
  43.  
  44. (makedir #bbpath
  45.    (prompt "I will now create the directory Backbone")
  46.    (help @makedir-help)
  47.    (infos)
  48. )
  49.  
  50. (set #temp (tackon #installdir "Libs/Bone.Library"))
  51. (copylib
  52.    (prompt "Copying Bone Library")
  53.    (help @copylib-help)
  54.    (source #temp)
  55.    (dest "LIBS:")
  56. )
  57.  
  58. (set #temp (tackon #installdir "Libs/Easylife.Library"))
  59. (copylib
  60.    (prompt "Copying Easylife Library")
  61.    (help @copylib-help)
  62.    (source #temp)
  63.    (dest "LIBS:")
  64. )
  65.  
  66. (set #temp (tackon #installdir "Libs/Explode.Library"))
  67. (copylib
  68.    (prompt "Copying Explode Library")
  69.    (help @copylib-help)
  70.    (source #temp)
  71.    (dest "LIBS:")
  72. )
  73.  
  74. (set #temp (tackon #installdir "Fonts/"))
  75. (copyfiles
  76.    (prompt "Copying Fonts")
  77.    (help @copylib-help)
  78.    (all)
  79.    (optional "force")
  80.    (source #temp)
  81.    (dest "LIBS:")
  82. )
  83.  
  84. (set #temp (tackon #bbpath "Modules"))
  85. (makedir #temp)
  86. (set #temp (tackon #bbpath "Modules/Blocks"))
  87. (makedir #temp)
  88. (set #temp (tackon #bbpath "Modules/Controls"))
  89. (makedir #temp)
  90. (set #temp (tackon #bbpath "Modules/Details"))
  91. (makedir #temp)
  92. (set #temp (tackon #bbpath "Modules/Levels"))
  93. (makedir #temp)
  94. (set #temp (tackon #bbpath "Modules/Menus"))
  95. (makedir #temp)
  96. (set #temp (tackon #bbpath "Modules/Objects"))
  97. (makedir #temp)
  98. (set #temp (tackon #bbpath "Modules/Panels"))
  99. (makedir #temp)
  100. (set #temp (tackon #bbpath "Modules/Player"))
  101. (makedir #temp)
  102. (set #temp (tackon #bbpath "Modules/Scenes"))
  103. (makedir #temp)
  104. (set #temp (tackon #bbpath "Modules/Screen"))
  105. (makedir #temp)
  106.  
  107. (set #temp (tackon #bbpath "Projects"))
  108. (makedir #temp)
  109. (set #temp (tackon #bbpath "Blocks"))
  110. (makedir #temp)
  111. (set #temp (tackon #bbpath "Music"))
  112. (makedir #temp)
  113. (set #temp (tackon #bbpath "Objects"))
  114. (makedir #temp)
  115. (set #temp (tackon #bbpath "Pictures"))
  116. (makedir #temp)
  117. (set #temp (tackon #bbpath "Rexx"))
  118. (makedir #temp)
  119. (set #temp (tackon #bbpath "Samples"))
  120. (makedir #temp)
  121. (set #temp (tackon #bbpath "Sounds"))
  122. (makedir #temp)
  123.  
  124. (copyfiles
  125.    (prompt "Copying all files to directory.")
  126.    (help @copyfiles-help)
  127.    (source #installdir)
  128.    (all)
  129.    (optional "force")
  130.    (dest #bbpath)
  131. )
  132.  
  133. (set #temp (tackon #bbpath "Libs"))
  134. (delete #temp
  135.    (prompt "Deleting unneeded Files")
  136.    (help "Just cleaning up!")
  137.    (all)
  138. )
  139.  
  140. (set #temp (tackon #bbpath "#?Install#?"))
  141. (delete #temp
  142.    (prompt "Deleting unneeded Files")
  143.    (help "Just cleaning up!")
  144.    (all)
  145. )
  146.  
  147. (set #end
  148. (cat
  149.    "Backbone Installation is now Complete!\n"
  150.    "Pressing HELP at any time will bring up the user manual.\n\n"
  151.    "For more information, join the Backbone mailing list:\n"
  152.    "Go to: http://welcome.to/backbone\n"
  153.    "   or: http://freespace.virgin.net/malcolm.murray/backboneml.html\n\n"
  154.    "The author, Alastair Murray can be e-mailled at:\n"
  155.    "malcolm.murray@virgin.net\n"
  156.    "See the user manual for more details on how to contact me!\n\n"
  157.    "The latest versions of Backbone can be found on\n"
  158.    "AMINET under dev/misc/\n\n"
  159. ))
  160. (message #end)
  161.  
  162. (set #end
  163. (cat
  164.    "I hope you enjoy using Backbone!\n"
  165.    "Please consider registering."
  166. ))
  167. (message #end)
  168.